object SqlForm: TSqlForm
  Left = 0
  Top = 0
  ActiveControl = Memo
  Caption = 'SQL vorm'
  ClientHeight = 515
  ClientWidth = 742
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -13
  Font.Name = 'Tahoma'
  Font.Style = []
  OldCreateOrder = False
  PixelsPerInch = 96
  TextHeight = 16
  object Splitter1: TSplitter
    Left = 0
    Top = 182
    Width = 742
    Height = 5
    Cursor = crVSplit
    Align = alTop
    ExplicitTop = 130
    ExplicitWidth = 451
  end
  object ButtonPanel: TPanel
    AlignWithMargins = True
    Left = 5
    Top = 5
    Width = 732
    Height = 33
    Margins.Left = 5
    Margins.Top = 5
    Margins.Right = 5
    Margins.Bottom = 0
    Align = alTop
    BevelOuter = bvNone
    TabOrder = 0
    ExplicitLeft = 0
    ExplicitTop = 0
    ExplicitWidth = 722
    DesignSize = (
      732
      33)
    object MenuButton: TSpeedButton
      Left = 707
      Top = 0
      Width = 25
      Height = 25
      Anchors = [akTop, akRight]
      Glyph.Data = {
        7E000000424D7E000000000000003E0000002800000010000000100000000100
        01000000000040000000C40E0000C40E0000020000000000000000000000FFFF
        FF00FFFF0000FFFF0000FFFF0000FFFF0000FFFF0000FEFF0000FC7F0000F83F
        0000F11F0000E38F0000F7DF0000FFFF0000FFFF0000FFFF0000FFFF0000FFFF
        0000}
      PopupMenu = PopupMenu
      ExplicitLeft = 717
    end
    object Button1: TButton
      Left = 0
      Top = 0
      Width = 105
      Height = 25
      Action = AcRunQuery
      TabOrder = 0
    end
    object DBNavigator1: TDBNavigator
      Left = 111
      Top = -1
      Width = 230
      Height = 25
      DataSource = DataSource
      TabOrder = 1
    end
  end
  object Memo: TMemo
    AlignWithMargins = True
    Left = 5
    Top = 38
    Width = 732
    Height = 144
    Margins.Left = 5
    Margins.Top = 0
    Margins.Right = 5
    Margins.Bottom = 0
    Align = alTop
    Font.Charset = BALTIC_CHARSET
    Font.Color = clWindowText
    Font.Height = -17
    Font.Name = 'Consolas'
    Font.Style = []
    ParentFont = False
    TabOrder = 1
    ExplicitLeft = 0
    ExplicitTop = 33
    ExplicitWidth = 722
  end
  object Grid: TDBGrid
    AlignWithMargins = True
    Left = 5
    Top = 187
    Width = 732
    Height = 304
    Margins.Left = 5
    Margins.Top = 0
    Margins.Right = 5
    Margins.Bottom = 5
    Align = alClient
    DataSource = DataSource
    TabOrder = 2
    TitleFont.Charset = DEFAULT_CHARSET
    TitleFont.Color = clWindowText
    TitleFont.Height = -13
    TitleFont.Name = 'Tahoma'
    TitleFont.Style = []
  end
  object StatusBar: TStatusBar
    Left = 0
    Top = 496
    Width = 742
    Height = 19
    Panels = <>
    ExplicitTop = 476
    ExplicitWidth = 722
  end
  object ActionList: TActionList
    Left = 280
    Top = 120
    object AcRunQuery: TAction
      Caption = 'K'#228'ivita p'#228'ring'
      ShortCut = 120
      OnExecute = AcRunQueryExecute
    end
  end
  object DataSource: TDataSource
    DataSet = Ds
    Left = 408
    Top = 72
  end
  object Ds: TClientDataSet
    Aggregates = <>
    Params = <>
    ProviderName = 'Provider'
    Left = 440
    Top = 72
  end
  object Provider: TDataSetProvider
    DataSet = Query
    Left = 472
    Top = 72
  end
  object Query: TSQLDataSet
    GetMetadata = False
    MaxBlobSize = -1
    Params = <>
    SQLConnection = ProgramModule.Connection
    Left = 504
    Top = 72
  end
  object PopupMenu: TPopupMenu
    Left = 704
    Top = 48
    object MCopyToClipboard: TMenuItem
      Caption = 'Kopeeri andmed'
      OnClick = MCopyToClipboardClick
    end
  end
end
